Hare_Male Class Reference

Class for male hares. More...

#include <hare_all.h>

Inheritance diagram for Hare_Male:

Public Member Functions
virtual void	BeginStep (void)
	BeginStep for Hare_Male. More...
virtual void	Step (void)
	Step for Hare_Male. More...
virtual void	EndStep (void)
	EndStep code for Hare_Male. More...
	Hare_Male (int p_x, int p_y, Landscape *p_L, THare_Population_Manager *p_PPM, double p_weight, int a_age, int a_Ref)
	Constructor. More...
void	ReInit (struct_Hare a_data)
	Male object reinitiation. More...
void	Init (double p_weight, int a_age, int a_Ref)
	Object initiation. More...
virtual	~Hare_Male ()
	Destructor. More...
virtual void	ON_Dead ()
Public Member Functions inherited from Hare_Juvenile
	Hare_Juvenile (int p_x, int p_y, Landscape *p_L, THare_Population_Manager *p_PPM, double p_weight)
	Constructor for the juvenile hare object. More...
void	ReInit (struct_Hare a_data)
	Juvenile object reinitiation. More...
void	Init (double p_weight)
	Object initiation. More...
virtual	~Hare_Juvenile ()
	Destructor for the juvenile hare object. More...
Public Member Functions inherited from THare
	THare (int p_x, int p_y, Landscape *p_L, THare_Population_Manager *p_PPM)
	Constructor. More...
void	THareInit (int p_x, int p_y, THare_Population_Manager *p_PPM)
	Object Initiation. More...
virtual	~THare ()
	Destructor. More...
double	GetWeight ()
double	GetTotalWeight ()
	Provide the wet weight of the hare. More...
int	GetAge ()
void	ON_MumDead (Hare_Female *a_Mum)
	Inform Mum that we are dead. More...
void	SetMum (Hare_Female *)
	Set the mother pointer. Reimplemented in Hare_Infant. More...
Hare_Female *	GetMum ()
	Get the mother pointer. More...
double	GetRMR ()
	Get todays RMR. More...
int	GetRefNum ()
	Get the refnum for this hare. More...
void	loadVegPalatability (void)
	Loads static member m_vegPalatability with data. More...
Public Member Functions inherited from TAnimal
unsigned	SupplyFarmOwnerRef ()
AnimalPosition	SupplyPosition ()
APoint	SupplyPoint ()
int	SupplyPolygonRef ()
int	Supply_m_Location_x ()
int	Supply_m_Location_y ()
virtual void	KillThis ()
virtual void	CopyMyself ()
void	SetX (int a_x)
void	SetY (int a_y)
	TAnimal (int x, int y, Landscape *L)
virtual void	ReinitialiseObject (int x, int y, Landscape *L)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual int	WhatState ()
virtual void	Dying ()
void	CheckManagement (void)
void	CheckManagementXY (int x, int y)
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo ()
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone ()
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
virtual void	ReinitialiseObject ()
	Used to re-use an object - must be implemented in descendent classes. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()
	The destructor for TALMaSSObject. More...
void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...

Protected Member Functions
TTypeOfHareState	st_Developing ()
	Male Development. More...
TTypeOfHareState	st_Foraging ()
	Male Foraging. More...
TTypeOfHareState	st_Resting ()
	Male Resting. More...
TTypeOfHareState	st_ReproBehaviour ()
	Currently Unused. More...
virtual void	InternalPesticideHandlingAndResponse ()
	Handles internal effects of pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
virtual void	GeneralEndocrineDisruptor (double)
	Handles internal effects of endocrine distrupter pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
virtual void	GeneralOrganoPhosphate (double)
	Handles internal effects of organophosphate pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
Protected Member Functions inherited from Hare_Juvenile
TTypeOfHareState	st_Developing ()
	The development code for Hare_Juvenile. More...
TTypeOfHareState	st_Dispersal ()
	Juvenile Dispersal. More...
TTypeOfHareState	st_Foraging ()
	Juvenile foraging. More...
void	st_NextStage ()
	Maturation to Hare_Male or Hare_Female. More...
TTypeOfHareState	st_Resting ()
	Juvenile Resting. More...
bool	ShouldMature ()
	Test for maturation. More...
virtual bool	WasPredated ()
	Test for mortality. More...
Protected Member Functions inherited from THare
bool	Run (int a_dist, int a_direction)
	Run a distance in a direction. More...
void	EnergyBalance (TTypeOfActivity a_activity, int dist)
	Adjust energy balance for an activity. More...
void	TimeBudget (TTypeOfActivity a_activity, int dist)
	Adjust time budger for an activity. More...
void	st_Dying ()
	Tidy up before removing the object on death. More...
virtual void	Running (int a_max_dist)
	Run. More...
void	Walking (int a_dist, int a_direction)
	Walking. More...
double	Forage (int &time)
	Foraging. More...
double	ForageP (int &time)
	Foraging but also incorporating pesticide exposure. More...
double	ForageSquare (int a_x, int a_y)
	Forage from an area. More...
double	ForageSquareP (int a_x, int a_y, double *a_pestexposure)
	Forage from an area and resturn pesticide exposure as well as food. More...
int	GetPegDistance ()
	Get peg distance. More...
int	GetPegPull ()
	Get attractive force of peg. More...
int	GetPegDirection ()
	Get direction of peg. More...
void	MovePeg ()
	Move the peg according to attraction forces. More...
bool	OnFarmEvent (FarmToDo event)
	Do we require a response to a farm event. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Additional Inherited Members
Static Public Attributes inherited from THare
static double *	m_vegPalatability = NULL
	Will hold and array of palatability for hare for each tov type. Most are 1, but unpalatable vegetation can be specified here. More...
Protected Attributes inherited from THare
TTypeOfHareState	m_CurrentHState
	Defines the current activity. More...
int	m_Age
	State variale - hare age. More...
Hare_Object	m_Type
	State variale - the type of hare. More...
double	m_weight
	State variale - hare weight g. More...
double	m_old_weight
	State variale - last hare weight. More...
Hare_Female *	m_MyMum
	Pointer to the hare's mum. More...
THare_Population_Manager *	m_OurPopulationManager
	Pointer to the hare population manager. More...
int	m_Lifespan
	Physiolocal lifespan, assuming nothing else kills the hare (unlikely to reach this age) More...
int	m_ActivityTime
	Minutes of potential activity time per day. More...
int	m_StarvationDays
	State variable - the number of consecutive days in negative energy balance. More...
double	m_fatReserve
	State variable - the energy reserve of the hare. More...
double	m_TodaysEnergy
	State variable - the amount of energy available today, can be in deficit. More...
double	m_EnergyMax
	State variable - the amount of energy it is possible to eat as a multiplyer or RMR. More...
double	m_KJRunning
	KJ/m cost of running per kg hare. More...
double	m_KJWalking
	KJ/m cost of walking per kg hare. More...
double	m_KJForaging
	KJ/m cost of foraging per kg hare. More...
double	m_SpeedRunning
	m/min speed of running per kg hare More...
double	m_SpeedWalking
	m/min speed of walking per kg hare More...
double	m_foragingenergy
	Energy obtained from foraging/feeding. More...
int	m_peg_x
	peg x-coordinate More...
int	m_peg_y
	peg y-coordinate More...
int	m_RefNum
	Unique hare reference number, also functions as sex flag. More...
int	m_experiencedDensity
	State variable used in alternative density-dependent configurations. More...
int	m_lastYearsDensity
	State variable used in alternative density-dependent configurations. More...
int	m_ddindex
	State variable used in alternative density-dependent configurations. More...
int	m_expDensity [365]
	State variable used in alternative density-dependent configurations. More...
int	m_DensitySum
	State variable used in alternative density-dependent configurations. More...
bool	m_IamSick
	flag for sickness - used in conjunction with disease configurations More...
double	m_pesticide_burden
	State variable used to hold the current body-burden of pesticide. More...
double	m_pesticidedegradationrate
	State variable used to hold the daily degredation rate of the pesticide in the body. More...
bool	m_pesticideInfluenced1
	Flag to indicate pesticide effects (e.g. can be used for endocrine distruptors with delayed effects until birth). More...
Protected Attributes inherited from TAnimal
int	m_Location_x
int	m_Location_y
Landscape *	m_OurLandscape
Protected Attributes inherited from TALMaSSObject
int	m_CurrentStateNo
	The basic state number for all objects - '-1' indicates death. More...
bool	m_StepDone
	Indicates whether the iterative step code is done for this timestep. More...

Detailed Description

Class for male hares.

Constructor & Destructor Documentation

Hare_Male()

Hare_Male::Hare_Male	(	int	p_x,
		int	p_y,
		Landscape *	p_L,
		THare_Population_Manager *	p_PPM,
		double	p_weight,
		int	a_age,
		int	a_Ref
	)

Constructor.

Hare_Male constructor.

                             : Hare_Juvenile(p_x,p_y,p_L,p_PPM,p_weight)
{
    Init(p_weight, a_age, a_Ref);
}

References Init().

~Hare_Male()

Hare_Male::~Hare_Male ( )

virtual

Destructor.

Hare_Male destructor.

{
  // Nothing to do
}

Member Function Documentation

BeginStep()

void Hare_Male::BeginStep ( void  )

virtual

BeginStep for Hare_Male.

Resets the day's activity counter and checks for default mortalities and potentially extra mortalities. Calculates energy usage for movement based on todays weight.
Also contains optional code designed to test for disease and size related death probabilities - part of the POM exercise
Unlike younger classes this method also tests for reaching the end of physiological lifespan

Reimplemented from Hare_Juvenile.

{
  m_ActivityTime=1440; // Start the day
  m_KJWalking=m_OurPopulationManager->GetKJperM((int)m_weight);
  m_KJRunning=m_KJWalking*2;
  m_KJForaging=m_KJWalking;
  m_foragingenergy=0;
#ifdef __SIZERELATEDDEATH
    if ((m_OurLandscape->SupplyDayInYear()>0) && ((m_OurLandscape->SupplyDayInYear()<90))) {
        if (m_Age>365) {
            if (m_weight<cfg_hare_minimum_breeding_weight.value()) {
                ON_Dead();
                m_StepDone=true; // We need to skip the step code, we are dead
                return;
            }
        }
    }
#endif
#ifdef __DISEASEDDMORTALITY
    if (m_IamSick) {
        ON_Dead();
        m_StepDone=true; // We need to skip the step code, we are dead
        return;
    }
#endif
    if (WasPredated()) {
        ON_Dead();
        m_StepDone=true; // We need to skip the step code, we are dead
        return;
    }
  // Age physiolocally
  if (++m_Age > m_Lifespan) {
    ON_Dead();
    m_StepDone=true; // We need to skip the step code, we are dead
    return;
  }
#ifdef __DISEASEDDM
    m_experiencedDensity+=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
    if (m_OurLandscape->SupplyDayInYear()==0) {
        m_lastYearsDensity=m_experiencedDensity/365;
        m_experiencedDensity=0;
        // Now assume that if there are 100 hares on average that there is 100% chance of getting sick
        if (random(cfg_HareFemaleSicknessDensityDepValue.value())<m_lastYearsDensity) {
            m_IamSick=true;
        }
        else m_IamSick=false;
    }
#endif
  if (g_rand_uni()<cfg_hare_proximity_alert.value()) {
    Running(cfg_hare_escape_dist.value());
  }
 
#ifdef __DISEASEDDM2
    m_experiencedDensity+=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
    if (m_OurLandscape->SupplyDayInYear()==0) {
        m_lastYearsDensity=m_experiencedDensity/365;
        m_experiencedDensity=0;
    }
#endif
#ifdef __DISEASEDDM3
    m_ddindex++;
    if (m_ddindex==365) {
        m_ddindex=0;
    }
    m_DensitySum-=m_expDensity[m_ddindex];
    m_expDensity[m_ddindex]=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
    m_DensitySum+=m_expDensity[m_ddindex];
    m_lastYearsDensity= int(m_DensitySum * (1.0/365.0));
#endif
    // Set the maximum possible energy intake
    m_EnergyMax = GetRMR()*cfg_MaxEnergyIntakeScaler.value();
    CheckManagement();
}

References cfg_hare_escape_dist, cfg_hare_minimum_breeding_weight, cfg_hare_proximity_alert, cfg_HareFemaleSicknessDensityDepValue, cfg_MaxEnergyIntakeScaler, TAnimal::CheckManagement(), g_rand_uni, THare_Population_Manager::GetKJperM(), THare::GetRMR(), THare_Population_Manager::GetTotalDensity(), THare::m_ActivityTime, THare::m_Age, THare::m_ddindex, THare::m_DensitySum, THare::m_EnergyMax, THare::m_expDensity, THare::m_experiencedDensity, THare::m_foragingenergy, THare::m_IamSick, THare::m_KJForaging, THare::m_KJRunning, THare::m_KJWalking, THare::m_lastYearsDensity, THare::m_Lifespan, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, THare::m_OurPopulationManager, TALMaSSObject::m_StepDone, THare::m_weight, ON_Dead(), random(), THare::Running(), Landscape::SupplyDayInYear(), CfgInt::value(), CfgFloat::value(), and Hare_Juvenile::WasPredated().

EndStep()

void Hare_Male::EndStep ( void  )

virtual

EndStep code for Hare_Male.

In EndStep, the home-range centre peg gravitates a little way towards the daily activity area for today.

Reimplemented from Hare_Juvenile.

{
    MovePeg();
    if (cfg_hare_pesticideresponse_on.value()) InternalPesticideHandlingAndResponse();
}

References cfg_hare_pesticideresponse_on, InternalPesticideHandlingAndResponse(), THare::MovePeg(), and CfgBool::value().

GeneralEndocrineDisruptor()

void Hare_Male::GeneralEndocrineDisruptor ( double  )

protectedvirtual

Handles internal effects of endocrine distrupter pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes.

Reimplemented from THare.

{
    return;
}

Referenced by InternalPesticideHandlingAndResponse().

GeneralOrganoPhosphate()

void Hare_Male::GeneralOrganoPhosphate ( double  )

protectedvirtual

Handles internal effects of organophosphate pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes.

Reimplemented from THare.

{
    if (g_rand_uni() > l_pest_daily_mort.value()) return;
    m_CurrentHState = tohs_Dying;
    m_StepDone = true;
    return;
}

References g_rand_uni, l_pest_daily_mort, THare::m_CurrentHState, TALMaSSObject::m_StepDone, tohs_Dying, and CfgFloat::value().

Referenced by InternalPesticideHandlingAndResponse().

Init()

void Hare_Male::Init	(	double	p_weight,
		int	a_age,
		int	a_Ref
	)

Object initiation.

{
    m_Type = hob_Male;
    m_fatReserve = p_weight*0.04;
    m_weight = p_weight;
    m_Age=a_age;
    m_RefNum=a_Ref;
}

References hob_Male, THare::m_Age, THare::m_fatReserve, THare::m_RefNum, THare::m_Type, and THare::m_weight.

Referenced by Hare_Male(), and ReInit().

InternalPesticideHandlingAndResponse()

void Hare_Male::InternalPesticideHandlingAndResponse ( )

protectedvirtual

Handles internal effects of pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes.

This method is re-implemented ffrom THare for any class which has pesticide response behaviour. If the body burden exceeds the trigger then call pesticide-specific actions by dose

Reimplemented from THare.

{
    TTypesOfPesticide tp = m_OurLandscape->SupplyPesticideType();
    double pesticideInternalConc = m_pesticide_burden / m_weight;
    if (m_pesticide_burden>0) m_OurPopulationManager->BodyBurdenOut(m_OurLandscape->SupplyYearNumber(), m_OurLandscape->SupplyDayInYear(), m_pesticide_burden, pesticideInternalConc);
 
    if (pesticideInternalConc > cfg_HarePesticideAccumulationThreshold.value())
    {
        switch (tp)
        {
        case ttop_NoPesticide:
            break;
        case ttop_ReproductiveEffects:
            GeneralEndocrineDisruptor(pesticideInternalConc); // Calls the EndocrineDisruptor action code
            break;
        case ttop_AcuteEffects:
            GeneralOrganoPhosphate(pesticideInternalConc); // Calls the GeneralOrganophosphate action code
            break;
        default:
            exit(47);
        }
    }
    m_pesticide_burden *= m_pesticidedegradationrate; // Does nothing by default except internal degredation of the pesticide
}

References THare_Population_Manager::BodyBurdenOut(), cfg_HarePesticideAccumulationThreshold, GeneralEndocrineDisruptor(), GeneralOrganoPhosphate(), TAnimal::m_OurLandscape, THare::m_OurPopulationManager, THare::m_pesticide_burden, THare::m_pesticidedegradationrate, THare::m_weight, Landscape::SupplyDayInYear(), Landscape::SupplyPesticideType(), Landscape::SupplyYearNumber(), ttop_AcuteEffects, ttop_NoPesticide, ttop_ReproductiveEffects, and CfgFloat::value().

Referenced by EndStep().

ON_Dead()

void Hare_Male::ON_Dead ( void  )

virtual

Minimal housekeeping for dying for the male

Reimplemented from Hare_Juvenile.

{
   m_CurrentHState=tohs_Dying;
   m_CurrentStateNo=-1;
   m_StepDone=true;
}

References THare::m_CurrentHState, TALMaSSObject::m_CurrentStateNo, TALMaSSObject::m_StepDone, and tohs_Dying.

Referenced by BeginStep(), THare_Population_Manager::Hunting(), THare_Population_Manager::HuntingGrid(), and Step().

ReInit()

void Hare_Male::ReInit

(

struct_Hare

a_data

)

Male object reinitiation.

{
    m_Location_x = a_data.x;
    m_Location_y = a_data.y;
    m_OurLandscape = a_data.L;
    m_CurrentStateNo = 0;
    THareInit(a_data.x, a_data.y, a_data.HM);
    Init(a_data.weight, a_data.age, a_data.RefNum);
}

References struct_Hare::age, struct_Hare::HM, Init(), struct_Hare::L, TALMaSSObject::m_CurrentStateNo, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, struct_Hare::RefNum, THare::THareInit(), struct_Hare::weight, struct_Hare::x, and struct_Hare::y.

Referenced by THare_Population_Manager::CreateObjects().

st_Developing()

TTypeOfHareState Hare_Male::st_Developing ( )

protected

Male Development.

{
  //Assumes that the fatReserve has been added to by st_Foraging from yesterday
  //
    // This is the last behaviour state called each day, so we can use this to sort out
    // the energetics
  //Assumes that the fatReserve has been added to by st_Foraging from yesterday
  //
 
    EnergyBalance(activity_Resting, 1440); // calculates the energy use by BMR
    if (m_TodaysEnergy<0) {
        m_fatReserve+=(m_TodaysEnergy * (1.0/42.7));
        m_TodaysEnergy=0;
    }
 // Grow
 // Solid food absorption is already taken into account by this time
 if (m_Age<365) {
    double Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyP(m_Age);
    if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
    double addedtoday=Target*m_OurPopulationManager->GetGrowthEfficiencyP(m_Age);
    m_weight+=addedtoday;
    m_TodaysEnergy-=Target;
    Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyF(m_Age);
    if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
    addedtoday=Target*m_OurPopulationManager->GetGrowthEfficiencyF(m_Age);
    m_weight+=addedtoday;
    m_TodaysEnergy-=Target;
 } else {
    double Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyF(m_Age);
    if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
    double gf=m_OurPopulationManager->GetGrowthEfficiencyF(m_Age);
    double addedtoday=Target*gf;
    m_weight+=addedtoday;
    m_TodaysEnergy-=Target;
 }
 if (m_TodaysEnergy>0) {
        // Put what remains back into fat reserve
        m_fatReserve+=m_TodaysEnergy*m_OurPopulationManager->GetGrowthEfficiencyF(366); // 366 is the fat conversion efficiency
        m_TodaysEnergy=0;
        // Cap the fat reserve and store surplus energy for today
        if (m_fatReserve>(cfg_AdultMaxFat.value() * m_weight)) {
            m_fatReserve=cfg_AdultMaxFat.value() * m_weight;
        }
        m_StarvationDays=0; // Not starving
        return tohs_Foraging;
    }
    else {
            m_fatReserve+=m_TodaysEnergy*m_OurPopulationManager->GetGrowthEfficiencyF(366); // 366 is the fat conversion efficiency
            if (m_fatReserve<0) {
                m_TodaysEnergy=m_fatReserve/m_OurPopulationManager->GetGrowthEfficiencyF(366);
                m_fatReserve=0.0;
            }
            else m_TodaysEnergy=0;
//          double rmr=m_OurPopulationManager->GetRMR(m_Age, GetTotalWeight());
//          if (m_TodaysEnergy<(0.0-(rmr*0.25)))
            if (m_TodaysEnergy<0.0)
            {
                // Oh oh, we are starving need to lose body weight and maybe we will die?
#ifdef __ADULT_WT_STARVE_CHANCE
                int testval=0;
                if (m_Age<cfg_fixadult_starve.value()) {
                    // Somewhere between juvenile and adult so use in between values
                    int diff = cfg_adult_starve.value() - cfg_juv_starve.value();
                    testval=cfg_adult_starve.value()-(int)((1.0-(cfg_fixadult_starve.value()/(double)m_Age))*diff);
 
                } else testval=cfg_adult_starve.value();
                if (++m_StarvationDays > cfg_adult_starvation_threshold.value()) {
                    if (random(10000)> testval) {
                        return tohs_Dying;
                    }
                }
#else
                if (++m_StarvationDays > cfg_adult_starvation_threshold.value()) {
                    return tohs_Dying;
                }
#endif
            }
            else {
                m_StarvationDays--; // Not starving
                if (m_StarvationDays<0) m_StarvationDays=0;
                m_TodaysEnergy=0;
            }
            if (random(3)==0) return tohs_Dispersal; // We are hungry, we need to disperse
    }
    return tohs_Foraging;
}

References activity_Resting, cfg_adult_starvation_threshold, cfg_adult_starve, cfg_AdultMaxFat, cfg_fixadult_starve, cfg_juv_starve, THare::EnergyBalance(), THare_Population_Manager::GetGrowthEfficiencyF(), THare_Population_Manager::GetGrowthEfficiencyP(), THare_Population_Manager::GetMaxDailyGrowthEnergyF(), THare_Population_Manager::GetMaxDailyGrowthEnergyP(), THare::m_Age, THare::m_fatReserve, THare::m_OurPopulationManager, THare::m_StarvationDays, THare::m_TodaysEnergy, THare::m_weight, random(), tohs_Dispersal, tohs_Dying, tohs_Foraging, CfgInt::value(), and CfgFloat::value().

Referenced by Step().

st_Foraging()

TTypeOfHareState Hare_Male::st_Foraging ( )

protected

Male Foraging.

Foraging code for the Hare_Male.

Foraging time is reduced dependent upon the density of hares in the local area. There are a number of options for calculting this effect used in the POM

{
    double time = (double)m_ActivityTime*cfg_ForageRestingRatio.value();;
   // We need to rest if there is no more time
   if (time < 30 ) return tohs_Resting;
   // If there are more hares here then interference reduces the activity time
#ifdef __DELAYEDDD
   int hares=(m_OurPopulationManager->GetDelayedAdultDensity(m_Location_x, m_Location_y));
#else
   int hares=(m_OurPopulationManager->GetAdultDensity(m_Location_x, m_Location_y));
#endif
#ifdef __THRESHOLD_AD_DD
  if (hares<m_OurPopulationManager->m_HareThresholdDD) hares=0;
  else hares-=m_OurPopulationManager->m_HareThresholdDD;
#endif
   //double interference=(1-(hares*hares)*cfg_HareMaleDensityDepValue.value());
   //if (interference<0) interference=0;
#ifdef __DISEASEDDM2
    double inter=m_OurPopulationManager->GetInterference(m_lastYearsDensity);
#else
#ifdef __DISEASEDDM3
    double inter=m_OurPopulationManager->GetInterference(m_lastYearsDensity);
#else
#ifndef __DDEPMORT
  double inter=m_OurPopulationManager->GetInterference(hares);
#else
    #ifndef __DISEASEDDM
      double inter=m_OurPopulationManager->GetInterference(hares);
    #else
      double inter=1.0;
    #endif
#endif
#endif
#endif
  if ((inter<0.5) && (time > 300))
  {
      if (g_rand_uni() > inter*2) // added to reduce rate of dispersal
      {
          // m_ActivityTime = (int)(time / cfg_ForageRestingRatio.value()); removed because it is superfluous
          return tohs_Dispersal; // Added Sat 15th Dec 2007
      }
  }
   time*=inter;
   // Given the time we have then we need to feed, which will return an energy
   // Value obtained.
   int a_time = (int) time;
   if (cfg_hare_pesticideresponse_on.value())
   {
       m_TodaysEnergy = ForageP(a_time);
   }
   else
   {
       m_TodaysEnergy = Forage(a_time);
   }
   // We need to spend energy on foraging and associated movement - but this is done in ForageSquare()
   TimeBudget(activity_Foraging, (int)time-a_time);
  // We need to rest
   return tohs_Resting;
}

References activity_Foraging, cfg_ForageRestingRatio, cfg_hare_pesticideresponse_on, THare::Forage(), THare::ForageP(), g_rand_uni, THare_Population_Manager::GetAdultDensity(), THare_Population_Manager::GetDelayedAdultDensity(), THare_Population_Manager::GetInterference(), THare::m_ActivityTime, THare_Population_Manager::m_HareThresholdDD, THare::m_lastYearsDensity, TAnimal::m_Location_x, TAnimal::m_Location_y, THare::m_OurPopulationManager, THare::m_TodaysEnergy, THare::TimeBudget(), tohs_Dispersal, tohs_Resting, CfgFloat::value(), and CfgBool::value().

Referenced by Step().

st_ReproBehaviour()

TTypeOfHareState Hare_Male::st_ReproBehaviour ( )

protected

Currently Unused.

{
  // TODO - this will need implementing if we have to simulate male reproduction (e.g. for genetic effects) or if we find we need this to alter survival in some way.
   return tohs_Resting;
}

References tohs_Resting.

Referenced by Step().

st_Resting()

TTypeOfHareState Hare_Male::st_Resting ( )

protected

Male Resting.

This method uses up the rest of the day in resting

{
   return tohs_Developing;
}

References tohs_Developing.

Referenced by Step().

Step()

void Hare_Male::Step ( void  )

virtual

Step for Hare_Male.

Step controls all the state/transition behaviour for the male hare.
Has some optional code for dispersal related mortality for use in POM testing.

Reimplemented from Hare_Juvenile.

{
  if (m_StepDone || m_CurrentStateNo == -1) return;
  switch (m_CurrentHState)
  {
   case tohs_InitialState: // Initial state
    m_CurrentHState=tohs_Foraging;
    break;
    case tohs_Dispersal:
     // Legal returns are:
     // tohs_MResting
     // tohs_MReproBehaviour
   // Dispersal is risky therefore take a test again
#ifdef __DISPERSALDDM
  if (g_rand_uni()<(cfg_hare_adult_predation.value())) {
        ON_Dead();
        m_StepDone=true; // We need to skip the step code, we are dead
        return;
    }
#endif
     m_CurrentHState=st_Dispersal();
     break;
    case tohs_Foraging:
    // Legal returns are:
    // tohs_MDispersal
    // tohs_MResting
    // tohs_MReproBehaviour
     m_CurrentHState=st_Foraging();
     break;
    case tohs_Resting:
     // Legal returns are:
     // tohs_MDeveloping
     m_CurrentHState=st_Resting();
     break;
    case tohs_ReproBehaviour:
     // Legal returns are:
     // tohs_MResting
     // tohs_MDeveloping
     m_CurrentHState=st_ReproBehaviour();
     break;
    case tohs_Developing:
     // Legal returns are:
     // tohs_Dying
     // tohs_MForaging
     m_CurrentHState=st_Developing();
     m_StepDone=true;
     break;
   case tohs_Dying:
    ON_Dead();
    m_StepDone=true;
    break;
   default:
    m_OurLandscape->Warn("Hare_Male::Step - unknown state",NULL);
    exit(1);
   }
}

References cfg_hare_adult_predation, g_rand_uni, THare::m_CurrentHState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, TALMaSSObject::m_StepDone, ON_Dead(), st_Developing(), Hare_Juvenile::st_Dispersal(), st_Foraging(), st_ReproBehaviour(), st_Resting(), tohs_Developing, tohs_Dispersal, tohs_Dying, tohs_Foraging, tohs_InitialState, tohs_ReproBehaviour, tohs_Resting, CfgFloat::value(), and Landscape::Warn().

---

The documentation for this class was generated from the following files:

• /builds/a1mass/almass_stable_oddox/Hare/hare_all.h
• /builds/a1mass/almass_stable_oddox/Hare/Hare_all.cpp